Aminet 1

home *** CD-ROM | disk | FTP | other *** search

/ Aminet 1 / Aminet - June 1993 [Walnut Creek].iso / usenet / sources / volume90 / unix / uucp103d / part01 next >

Wrap

Internet Message Format | 1990-02-04 | 69.8 KB

Path: xanth!cs.odu.edu!Amiga-Request From: Amiga-Request@cs.odu.edu (Amiga Sources/Binaries Moderator) Newsgroups: comp.sources.amiga Subject: v90i045: uucp 1.03D - unix compatible uucp/mail/news system, Part01/16 Message-ID: <11272@xanth.cs.odu.edu> Date: 4 Feb 90 01:51:44 GMT Sender: tadguy@cs.odu.edu Reply-To: overload!dillon (Matt Dillon) Lines: 2613 Approved: tadguy@cs.odu.edu (Tad Guy) X-Mail-Submissions-To: Amiga@cs.odu.edu Submitted-by: overload!dillon (Matt Dillon) Posting-number: Volume 90, Issue 045 Archive-name: unix/uucp-1.03d/part01 [ This is the release version of the Dillon/Loftus UUCP package for the Amiga. With this package and a willing UUCP neighbor, it's possible for your Amiga to participate in the UUCP network for both file transfer and mail, and to join in USENET. All the files in the two-disk distribution (available via anonymous ftp from ucbvax.berkeley.edu) are included in the comp.binaries.amiga postings except the sources. This means that if you don't want the sources, you can ignore the postings in comp.sources.amiga. Additionally, in both groups, a list of how the files were originally distributed between the two disks is included. The file s/man/Standards has been split to allow for posting. Remember to rejoin this file after unsharing. ...tad ] #!/bin/sh # This is a shell archive. Remove anything before this line, then unpack # it by saving it into a file and typing "sh file". To overwrite existing # files, type "sh file -c". You can also feed this as standard input via # unshar, or by typing "sh <file", e.g.. If this archive is complete, you # will see the following message at the end: # "End of archive 1 (of 16)." # Contents: NewsSetup.DOC README.NOW devs devs/.DistFiles # devs/Mountlist lib lib/.signature lib/Config lib/Domain # lib/Getty-header lib/L.Sys lib/NewsGroups lib/Passwd lib/Security # lib/SeqNews lib/news.distribution lib/seq man man/.Distfiles # man/Config man/From man/MapExample man/NULL man/PhoneBook # man/Rmail man/TrimFile man/expandm s s/.DistFiles s/crontab # s/startup-sequence src src/.Distfiles src/GUtil # src/GUtil/DMakefile src/GUtil/uident.c src/MUtil # src/MUtil/DMakefile src/MUtil/expandm.c src/News060 # src/News060/Anews src/News060/Anews/DMakefile # src/News060/DMakefile src/ReadMe src/TODO src/compress # src/compress/DMakefile src/dmail src/dmail/TODO # src/dmail/dmkhelp.c src/dmail/execom.h src/getty # src/getty/DMakefile src/getty/syms.c src/include src/include/log.h # src/include/pwd.h src/include/sys src/include/sys/file.h # src/include/sys/stat.h src/include/sys/time.h # src/include/sys/types.h src/include/tmpfile.h src/lib # src/lib/DMakefile src/lib/getenv.c src/lib/lsys.c src/lib/mntreq.c # src/lib/seq.c src/lib/setstdin.c src/lib/sleep.c src/lib/string.c # src/lib/syms.c src/lib/tmpfile.c src/lib/validuser.c src/sendmail # src/sendmail/DMakefile src/uucico src/uucico/modem.h # src/uucico/uuhosts.c src/uucico/uuname.c src/uucico/uupoll.c # src/uuser src/uuser/DMakefile src/uuser/mountlist src/version.h # Wrapped by tadguy@xanth on Sat Feb 3 20:50:54 1990 PATH=/bin:/usr/bin:/usr/ucb ; export PATH if test -f 'NewsSetup.DOC' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'NewsSetup.DOC'\" else echo shar: Extracting \"'NewsSetup.DOC'\" $755 characters$ sed "s/^X//" >'NewsSetup.DOC' <<'END_OF_FILE' X X NEWSSETUP.DOC X X This is really only a note. Once you have the rest of UUCP X working and get a news feed (by having another machine sent X news to you), you should edit the file 'UULIB:Newsgroups'. X This file contains a list of newsgroups you wish to receive, X one per line. X X Any groups received that are not in this list will be written X to the directory UUNEWS:Rejects ... you can clean out this X directory with a crontab entry (see DCron manual page) that, say, X deletes the directory once a day. X X The program 'ANews', part of William Loftus's 0.60 News X distribution, can be used to read news. News is placed in X separate directories in the UUNEWS: directory. X X As I said, really aweful documentation eh? X END_OF_FILE if test 755 -ne `wc -c <'NewsSetup.DOC'`; then echo shar: \"'NewsSetup.DOC'\" unpacked with wrong size! fi # end of 'NewsSetup.DOC' fi if test -f 'README.NOW' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'README.NOW'\" else echo shar: Extracting \"'README.NOW'\" $7968 characters$ sed "s/^X//" >'README.NOW' <<'END_OF_FILE' X X README.NOW X X V1.03D X The version number is 1.03D(0.40W/0.60W), or 1.03D for short. X X * After you glance at the rest of this document refer to the X file "QuickSetup.DOC". Seasoned UUCP users may want to X glance at QuickSetup.DOC but spend the majority of their X time on SlowSetup.DOC X X * UUCP should be tested via QuickSetup.DOC by inexperienced X UUCP users before attempting a real installation. X X * The first floppy is bootable (note: distributions on networks X do not include commodore 1.3 system executables). The boot X sequence sets up the appropriate directories and assigns and X runs two programs (Getty and DCron) in the background before X giving you a standard CLI prompt. X X The second floppy contains additional executables, manual pages, X and the source code. X X ** Credits ** X X P.S. I try not to imply favoritism and have attempted to put X together exactly who did what in this release. When possible X history is given... and, of course, I know what I have done X much better than I know what other people have done so don't X take the below list as a 'who did the most' list... everyone X did a lot. X X X VERSION X X This code is based on months of work on William P. Loftus's X Amiga UUCP 0.40 release with news code from his 0.60 release. X The version number is shown at the top of this file. x.xxD X refers to versions originated by myself and have nothing to do with X WPL's version numbering. The code is sufficiently different .. X MAJORLY different that it is not possible to assign a sub version X relative to WPLs version numbering. X X COPYRIGHTS X X This distribution is freely redistributable as long as all files and X directory structures, except the 'system' directory which contains X commodore-amiga executables, remain intact. Redistributions X which include enhanced or additional modules while keeping the same X basic structure are allowed but discouraged (I would much rather you X sent the mods / additions to me and I will pass them on as is X appropriate). Redistributions may charge fees at-cost (i.e. non- X commercial and non-profit). These terms may change at any time X and all holders of copyrights on code in the distribution may set X their own terms independant of any terms set in this document for X related executable modules and source in this distribution. X X Copyrights contained in the source effect the specific source files X in question and the derived executable independant of other source X files and derived executables. For example, the GNU copyright does X not effect the 'sendmail' source and binaries which is entirely my X own code. X X source containing the GNU copyright notice and derived executables are X subject to the GNU Emacs General Public License. This license is X available in the file man/GNU-LICENSE. X X Matthew Dillon X 891 Regal Rd. X Berkeley, Ca. 94708 X USA X X pacbell.PacBell.COM!sorinc!overload!dillon X X X Code containing parts of the original GNU release will contain the X following copyright: X X (C) Copyright 1987 by John Gilmore X Copying and use of this program are controlled by the terms of the Free X Software Foundation's GNU Emacs General Public License. X X Code modified or written from scratch by William Loftus will contain X the following copyright: X X (C) Copyright 1988 by William Loftus. All Rights Reserved. X X Code modified or written from scratch by Matthew Dillon will contain X the following copyright: X X (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X X Code containing one more copyrights is interpreted as meaning the code X is based on previous copyrights and modifications based on subsequent X copyrights. X X Additional copyright messages may exist in source files and X executables. X X I appologize for any mistakes I have made, please contact me with any X corrections at pacbell.pacbell.com!sorinc!overload!dillon or X X Matthew Dillon X 891 Regal Rd. X Berkeley, Ca. 94708 X USA X X Questions pertaining to previous releases of UUCP and News060 which X is in this release can be sent to: X X William Loftus uucp: wpl@burdvax.UUCP X Unisys/Paoli Research Center arpa: wpl@prc.unisys.com X PO Box 517 Phone: 215-648-7248 (work) X Paoli, PA 19301-0517 215-354-0614 (home) X X X X The below represents originators and major contributors. Again, X please correct me! X X - = so small it doesn't matter. X ? = I don't know X JG = John Gilmore X WPL = William P. Loftus prc.Unisys.COM!wpl X MD = Matthew Dillon pacbell.pacbell.com!sorinc!overload X PHL = Phil Lindsay X CAS = Carolyn Scheppner X AFI = Andy Finkel X CMM = Chuck McManis X CNB = Craig Norborg X X Xsrc/News060/rnews.c WPL Xsrc/News060/Anews/anews.c WPL Xsrc/News060/Anews/sendpacket.c PHL CAS AFI Xsrc/News060/Anews/raw.c CMM Xsrc/News060/Anews/mscan.c JG WPL Xsrc/News060/Anews/DMakefile MD Xsrc/News060/postnews.c WPL Xsrc/News060/DMakefile MD Xsrc/uuser/uuser.doc MD Xsrc/uuser/misc.c PHL MD Xsrc/uuser/DMakefile - Xsrc/uuser/mountlist - Xsrc/uuser/uuser.c MD Xsrc/dmail/compat.c MD Xsrc/dmail/DMakefile - Xsrc/dmail/dmail.h MD Xsrc/dmail/dmail.help MD Xsrc/dmail/execom.h MD Xsrc/dmail/commands.c MD Xsrc/dmail/cond.c MD Xsrc/dmail/dmkhelp.c MD Xsrc/dmail/do_lists.c MD Xsrc/dmail/execom.c MD Xsrc/dmail/globals.c MD Xsrc/dmail/help.c MD Xsrc/dmail/load_mail.c MD Xsrc/dmail/main.c MD Xsrc/dmail/range.c MD Xsrc/dmail/sendmail.c MD Xsrc/dmail/set.c MD Xsrc/dmail/sub.c MD Xsrc/sendmail/DMakefile - Xsrc/sendmail/sendmail.c MD Xsrc/sendmail/parse.c MD Xsrc/sendmail/domain.c MD Xsrc/compress/compress.c ? Xsrc/compress/tarsplit.c ? Xsrc/compress/DMakefile - Xsrc/compress/unshar.c CNB Xsrc/compress/uudecode.c ? Xsrc/compress/uuencode.c ? Xsrc/GUtil/uident.c MD Xsrc/GUtil/gnote.c MD Xsrc/GUtil/uuserdump.c MD Xsrc/GUtil/DMakefile - Xsrc/MUtil/trimfile.c MD Xsrc/MUtil/from.c ? Xsrc/MUtil/man.c ? Xsrc/MUtil/DMakefile - Xsrc/MUtil/expandm.c MD Xsrc/ReadMe MD Xsrc/uucico/version.doc - Xsrc/uucico/sysdep.c JG WPL MD Xsrc/uucico/uucico.c JG WPL MD Xsrc/uucico/DMakefile - Xsrc/uucico/modem.h WPL Xsrc/uucico/uuxqt.c WPL Xsrc/uucico/uupoll.c WPL Xsrc/uucico/uux.c WPL Xsrc/uucico/gio.c MD Xsrc/uucico/sysdep.h WPL Xsrc/uucico/uuname.c WPL Xsrc/uucico/includes.h JG WPL MD Xsrc/uucico/uuhosts.c WPL Xsrc/uucico/uucp.c WPL Xsrc/uucico/uucp.h JG WPL Xsrc/uucico/modem.c MD Xsrc/include/log.h MD Xsrc/include/tmpfile.h MD Xsrc/include/config.h MD Xsrc/include/pwd.h MD Xsrc/include/sys/stat.h MD Xsrc/include/sys/types.h MD Xsrc/include/sys/file.h MD Xsrc/include/sys/time.h MD Xsrc/getty/getty.c MD Xsrc/getty/syms.c MD Xsrc/getty/passwd.c MD Xsrc/getty/DMakefile - Xsrc/lib/string.c MD Xsrc/lib/getenv.c MD Xsrc/lib/sleep.c MD Xsrc/lib/security.c MD Xsrc/lib/lsys.c MD Xsrc/lib/mntreq.c MD Xsrc/lib/log.c MD Xsrc/lib/tmpfile.c MD Xsrc/lib/seq.c MD Xsrc/lib/config.c MD Xsrc/lib/setstdin.c MD Xsrc/lib/serialport.c MD Xsrc/lib/DMakefile - Xsrc/lib/getpwnam.c MD Xsrc/lib/lockfile.c MD Xsrc/lib/syms.c MD Xsrc/lib/alias.c MD Xsrc/lib/validuser.c MD Xsrc/version.h Xsrc/TODO X X VERSIONS X X1.02D X stack warning in SlowSetup.DOC added (stack should be at least X 8192). 'Stack 8192' added to sample startup sequence. RNews X warning (RNews takes a huge amount of RAM currently) added. X X1.01D X UUCP:LIB paths fixed to use UULIB: X X1.00D X Initial Release 'D' series by Matthew Dillon, based on X 0.40, 0.50 and 0.60WPL series by William Loftus. X X0.60WPL X0.50WPL X0.40WPL X UUCP release series for the Amiga by William Loftus, sub X version changes not listed in this file. X X END_OF_FILE if test 7968 -ne `wc -c <'README.NOW'`; then echo shar: \"'README.NOW'\" unpacked with wrong size! fi # end of 'README.NOW' fi if test ! -d 'devs' ; then echo shar: Creating directory \"'devs'\" mkdir 'devs' fi if test -f 'devs/.DistFiles' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'devs/.DistFiles'\" else echo shar: Extracting \"'devs/.DistFiles'\" $30 characters$ sed "s/^X//" >'devs/.DistFiles' <<'END_OF_FILE' X Xroot:1.3/devs/serial.device X END_OF_FILE if test 30 -ne `wc -c <'devs/.DistFiles'`; then echo shar: \"'devs/.DistFiles'\" unpacked with wrong size! fi # end of 'devs/.DistFiles' fi if test -f 'devs/Mountlist' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'devs/Mountlist'\" else echo shar: Extracting \"'devs/Mountlist'\" $185 characters$ sed "s/^X//" >'devs/Mountlist' <<'END_OF_FILE' X XUUSER: Handler = l:uuser-handler X Stacksize = 6000 X Priority = 5 X GlobVec = 1 X# X XNULL: Handler = l:null-handler X Stacksize = 500 X Priority = 5 X GlobVec = 1 X# X END_OF_FILE if test 185 -ne `wc -c <'devs/Mountlist'`; then echo shar: \"'devs/Mountlist'\" unpacked with wrong size! fi # end of 'devs/Mountlist' fi if test ! -d 'lib' ; then echo shar: Creating directory \"'lib'\" mkdir 'lib' fi if test -f 'lib/.signature' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/.signature'\" else echo shar: Extracting \"'lib/.signature'\" $167 characters$ sed "s/^X//" >'lib/.signature' <<'END_OF_FILE' X X X X Somebody Or Other Path to get to you (always begin with a X Your Address Maybe fully domain'd machine). X X Suggest you use only '!'s in your path. X END_OF_FILE if test 167 -ne `wc -c <'lib/.signature'`; then echo shar: \"'lib/.signature'\" unpacked with wrong size! fi # end of 'lib/.signature' fi if test -f 'lib/Config' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/Config'\" else echo shar: Extracting \"'lib/Config'\" $255 characters$ sed "s/^X//" >'lib/Config' <<'END_OF_FILE' XNodeName uucp XUserName root XRealName Foo The Bar XDebug 0 XNewsFeed newsnode XOrganization Not an Organization XFilter DMe XRFilter DMe XMailEditor DMe XDomainName .UUCP XTimeZone PST XDefaultNode overload.UUCP X END_OF_FILE if test 255 -ne `wc -c <'lib/Config'`; then echo shar: \"'lib/Config'\" unpacked with wrong size! fi # end of 'lib/Config' fi if test -f 'lib/Domain' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/Domain'\" else echo shar: Extracting \"'lib/Domain'\" $987 characters$ sed "s/^X//" >'lib/Domain' <<'END_OF_FILE' X X# UULIB:Domain Domain data base for mailer X# X# Refer to MAN:Domains for information on how the domain file works X# This file holds domain information for properly routing email when X# you talk to several adjacent sites. When you can talk to just a X# single site this file should contain a single master default to X# that site. X# X# SAMPLE MULTI-SITE DOMAIN FILE, commented out. If your UUCP X# site connects to only one other site you do not need a Domain X# file, simply set the 'DefaultNode' entry in UULIB:Config to X# that site. X# X# If you can talk UUCP to multiple other sites and wish to route X# various domains to different sites you need to construct a Domain X# file that looks something like that below. The first entry, '*', X# serves as a default and you do not need a 'DefaultNode' entry X# in UULIB:Config. X# X# Again, refer to the manual pages. X# X#* MF UU sorinc.UUCP X#*.EDU MF UU fubar.UUCP!buggy.CTS.COM X#*.COM MF UU chugly.UUCP X X END_OF_FILE if test 987 -ne `wc -c <'lib/Domain'`; then echo shar: \"'lib/Domain'\" unpacked with wrong size! fi # end of 'lib/Domain' fi if test -f 'lib/Getty-header' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/Getty-header'\" else echo shar: Extracting \"'lib/Getty-header'\" $99 characters$ sed "s/^X//" >'lib/Getty-header' <<'END_OF_FILE' X X This machine is currently a stupid UUCP node... the user hasn't X followed the directions. X END_OF_FILE if test 99 -ne `wc -c <'lib/Getty-header'`; then echo shar: \"'lib/Getty-header'\" unpacked with wrong size! fi # end of 'lib/Getty-header' fi if test -f 'lib/L.Sys' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/L.Sys'\" else echo shar: Extracting \"'lib/L.Sys'\" $497 characters$ sed "s/^X//" >'lib/L.Sys' <<'END_OF_FILE' X X# Examples.... Xoverload Any SER: 2400 5255506 ogin: uucp sword: uupc Xcae780 Any SER: 2400 5555678 ogin: Udillon sword: barbbb Xspooge Any SER: 2400 5559012 ogin: uucp sword: catccc Xsorinc Any SER: 2400 5553456 ogin: uover sword: dogddd Xapple Any SER: 2400 1,408,5557890 "" \d\r\c ogin: ovrdrive word: egoeee X X# Examples for simple testing Xuucp Any SER: 1200 5555555 ogin: uucp sword: uupc Xtest1 Any SER: 1200 5555555 ogin: uucp sword: uupc Xtest2 Any SER: 1200 5555555 ogin: uucp sword: uupc X END_OF_FILE if test 497 -ne `wc -c <'lib/L.Sys'`; then echo shar: \"'lib/L.Sys'\" unpacked with wrong size! fi # end of 'lib/L.Sys' fi if test -f 'lib/NewsGroups' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/NewsGroups'\" else echo shar: Extracting \"'lib/NewsGroups'\" $71 characters$ sed "s/^X//" >'lib/NewsGroups' <<'END_OF_FILE' Xcomp.sys.amiga Xcomp.sys.amiga.tech Xnews.admin Xrec.games.frp Xnews.misc X END_OF_FILE if test 71 -ne `wc -c <'lib/NewsGroups'`; then echo shar: \"'lib/NewsGroups'\" unpacked with wrong size! fi # end of 'lib/NewsGroups' fi if test -f 'lib/Passwd' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/Passwd'\" else echo shar: Extracting \"'lib/Passwd'\" $600 characters$ sed "s/^X//" >'lib/Passwd' <<'END_OF_FILE' X X# UUCP:LIB/PASSWD X# X# User,Password,Uid,GroupId,(Finger-Info),Home-Dir,Command-To-Run X# name, X# NOTE, if command-to-run is prefaced with a '*' Getty will open X# the UUSER: device for stdin and stdout and a read-timeout of X# 1 second. X Xinfo,*,100,0,(Info Login),ram:,*uuserdump UULIB:Info-Text Xucae,aaa,200,0,(UUCP-CAE780),ram:,uucico Xukorn,bbb,201,0,(UUCP-KORN),ram:,uucico Xua500,ccc,202,0,(UUCP-A500),ram:,uucico Xuapple,eee,204,0,(UUCP-UAPPLE),ram:,uucico X X# Dumb entry for testing (you may want to not have this in a real X# system). Xuucp,uupc,203,0,(UUCP-DUMB),ram:,uucico X END_OF_FILE if test 600 -ne `wc -c <'lib/Passwd'`; then echo shar: \"'lib/Passwd'\" unpacked with wrong size! fi # end of 'lib/Passwd' fi if test -f 'lib/Security' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/Security'\" else echo shar: Extracting \"'lib/Security'\" $369 characters$ sed "s/^X//" >'lib/Security' <<'END_OF_FILE' X X# This file is used by UUCICO to determine the validity of requests. X# X# The directories listed here are *allowed* directories for uucp X# transfers. The permissions field lists permissions X# r -readable X# w -writable X# X# DO NOT PUT UUSPOOL: IN THIS LIST X X Xtmp: rw Xuucp:c r Xuucp:man r XUUPUB: rw Xdist: r Xdist:uucp0 r Xdist:uucp1 r X END_OF_FILE if test 369 -ne `wc -c <'lib/Security'`; then echo shar: \"'lib/Security'\" unpacked with wrong size! fi # end of 'lib/Security' fi if test -f 'lib/SeqNews' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/SeqNews'\" else echo shar: Extracting \"'lib/SeqNews'\" $3 characters$ sed "s/^X//" >'lib/SeqNews' <<'END_OF_FILE' X38 END_OF_FILE if test 3 -ne `wc -c <'lib/SeqNews'`; then echo shar: \"'lib/SeqNews'\" unpacked with wrong size! fi # end of 'lib/SeqNews' fi if test -f 'lib/news.distribution' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/news.distribution'\" else echo shar: Extracting \"'lib/news.distribution'\" $164 characters$ sed "s/^X//" >'lib/news.distribution' <<'END_OF_FILE' Xpa Pennsylvania Xnj New Jersey Xny New York Xusa United States Xna North America Xworld Everywhere on Usenet in the world (same as net) X END_OF_FILE if test 164 -ne `wc -c <'lib/news.distribution'`; then echo shar: \"'lib/news.distribution'\" unpacked with wrong size! fi # end of 'lib/news.distribution' fi if test -f 'lib/seq' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'lib/seq'\" else echo shar: Extracting \"'lib/seq'\" $4 characters$ sed "s/^X//" >'lib/seq' <<'END_OF_FILE' X1996END_OF_FILE if test 4 -ne `wc -c <'lib/seq'`; then echo shar: \"'lib/seq'\" unpacked with wrong size! fi # end of 'lib/seq' fi if test ! -d 'man' ; then echo shar: Creating directory \"'man'\" mkdir 'man' fi if test -f 'man/.Distfiles' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/.Distfiles'\" else echo shar: Extracting \"'man/.Distfiles'\" $22 characters$ sed "s/^X//" >'man/.Distfiles' <<'END_OF_FILE' X Xsrc:dme/doc/dme.doc X END_OF_FILE if test 22 -ne `wc -c <'man/.Distfiles'`; then echo shar: \"'man/.Distfiles'\" unpacked with wrong size! fi # end of 'man/.Distfiles' fi if test -f 'man/Config' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/Config'\" else echo shar: Extracting \"'man/Config'\" $62 characters$ sed "s/^X//" >'man/Config' <<'END_OF_FILE' X X See 'Assigns' for information on the UULIB:Config file. X END_OF_FILE if test 62 -ne `wc -c <'man/Config'`; then echo shar: \"'man/Config'\" unpacked with wrong size! fi # end of 'man/Config' fi if test -f 'man/From' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/From'\" else echo shar: Extracting \"'man/From'\" $380 characters$ sed "s/^X//" >'man/From' <<'END_OF_FILE' X XNAME X FROM - list all mail in the users mailbox X XSYNTAX X From [user/file] X XDESCRIPTION X the From program prints out the From: and Subject: fields of X received mail. If no user/file is specified the UserName X UULIB:Config entry is used. X X Multiple files may be specified. X X From attempts to pick out the real name of the sender from the X From: field. X X END_OF_FILE if test 380 -ne `wc -c <'man/From'`; then echo shar: \"'man/From'\" unpacked with wrong size! fi # end of 'man/From' fi if test -f 'man/MapExample' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/MapExample'\" else echo shar: Extracting \"'man/MapExample'\" $749 characters$ sed "s/^X//" >'man/MapExample' <<'END_OF_FILE' XFrom: cbmvax!njin.rutgers.edu!dpz (David P. Zimmerman) XSubject: ACK for heimat UUCP map XTo: heimat!sneakers XDate: Sun, 17 Jul 88 23:37:50 EDT X XYour "heimat" UUCP map has been entered into the UUCP map database. XHowever, I had to clean it up a bit. Here is your revised entry. X X service with a :-), X X David P. Zimmerman X PA Regional Coordinator X The UUCP Mapping Project X X#N heimat X#S Commodore-AMIGA; Amiga-DOS V1.3 & Amiga-UUCP V0.30 X#O Sneakers Computing X#C Dan Schein X#E heimat!sneakers X#T +1 215 678 7691 X#P 2455 McKinley Ave, West Lawn, PA 19609 X#L X#R This is a test site for the development of Amiga-UUCP & UseNet software. X#U X#W heimat!sneakers (Dan "Sneakers" Schein); Wed Jul 11 20:38:16 EST 1988 X# Xheimat cbmvax(DEMAND) X X X END_OF_FILE if test 749 -ne `wc -c <'man/MapExample'`; then echo shar: \"'man/MapExample'\" unpacked with wrong size! fi # end of 'man/MapExample' fi if test -f 'man/NULL' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/NULL'\" else echo shar: Extracting \"'man/NULL'\" $572 characters$ sed "s/^X//" >'man/NULL' <<'END_OF_FILE' X XNAME X NULL: X XSYNOPSIS X Mount NULL: X XDESCRIPTION X the NULL: device is a dos handler designed to allow programs X such as DCron, DMe, etc... to run other programs in the X background while still allowing the user to close the CLI X window these programs were originally backgrounded on. X X NULL: Requires L:Handler and a proper mountlist entry: X XNULL: Handler = root:L/null-handler X Stacksize = 1024 X Priority = 5 X GlobVec = 1 X# X X Getty also uses NULL:. You normally Mount NULL: in your X startup-sequence. X X XFILES/REQUIRES X L:Null-Handler X DEVS:Mountlist X XREFERENCES X Getty X X X END_OF_FILE if test 572 -ne `wc -c <'man/NULL'`; then echo shar: \"'man/NULL'\" unpacked with wrong size! fi # end of 'man/NULL' fi if test -f 'man/PhoneBook' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/PhoneBook'\" else echo shar: Extracting \"'man/PhoneBook'\" $320 characters$ sed "s/^X//" >'man/PhoneBook' <<'END_OF_FILE' X X Matthew Dillon X 891 Regal Rd. X Berkeley, Ca. 94708 X X uucp: pacbell.pacbell.com!sorinc!overload!dillon X X William Loftus uucp: wpl@burdvax.UUCP X Unisys/Paoli Research Center arpa: wpl@prc.unisys.com X PO Box 517 Phone: 215-648-7248 (work) X Paoli, PA 19301-0517 215-354-0614 (home) X END_OF_FILE if test 320 -ne `wc -c <'man/PhoneBook'`; then echo shar: \"'man/PhoneBook'\" unpacked with wrong size! fi # end of 'man/PhoneBook' fi if test -f 'man/Rmail' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/Rmail'\" else echo shar: Extracting \"'man/Rmail'\" $314 characters$ sed "s/^X//" >'man/Rmail' <<'END_OF_FILE' X XNAME X rmail - route mail to users on remote systems X XSYNTAX X rmail user... X XDESCRIPTION X The rmail command interprets incoming mail received via X uucp, and passing the processed mail on to the required X program(s) X X The rmail is explicitly designed for use with uucp and send- X mail. X END_OF_FILE if test 314 -ne `wc -c <'man/Rmail'`; then echo shar: \"'man/Rmail'\" unpacked with wrong size! fi # end of 'man/Rmail' fi if test -f 'man/TrimFile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/TrimFile'\" else echo shar: Extracting \"'man/TrimFile'\" $403 characters$ sed "s/^X//" >'man/TrimFile' <<'END_OF_FILE' X XNAME X TrimFile X XSYNOPSIS X TrimFile file1 file2 ... fileN [-N] X XDESCRIPTION X TRIMFILE trims the specified files to N lines each. If no X -N argument is given the files are trimmed to 100 lines each. X X The last N lines of the file are kept. Each line may be up X to 256 characters long. X X TRIMFILE currently allocates memory to hold the lines and so X should not be used with large numeric arguments. X X END_OF_FILE if test 403 -ne `wc -c <'man/TrimFile'`; then echo shar: \"'man/TrimFile'\" unpacked with wrong size! fi # end of 'man/TrimFile' fi if test -f 'man/expandm' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'man/expandm'\" else echo shar: Extracting \"'man/expandm'\" $193 characters$ sed "s/^X//" >'man/expandm' <<'END_OF_FILE' X XNAME X Expandm X XSYNOPSIS X Expandm alias1 alias2 ... aliasN X XDESCRIPTION X This program expands the specified aliases and displays X the results. X XFILES X UULIB:Aliases X XREFERENCES X MAN:Aliases X X X END_OF_FILE if test 193 -ne `wc -c <'man/expandm'`; then echo shar: \"'man/expandm'\" unpacked with wrong size! fi # end of 'man/expandm' fi if test ! -d 's' ; then echo shar: Creating directory \"'s'\" mkdir 's' fi if test -f 's/.DistFiles' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'s/.DistFiles'\" else echo shar: Extracting \"'s/.DistFiles'\" $9 characters$ sed "s/^X//" >'s/.DistFiles' <<'END_OF_FILE' X Xs:.edrc END_OF_FILE if test 9 -ne `wc -c <'s/.DistFiles'`; then echo shar: \"'s/.DistFiles'\" unpacked with wrong size! fi # end of 's/.DistFiles' fi if test -f 's/crontab' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'s/crontab'\" else echo shar: Extracting \"'s/crontab'\" $471 characters$ sed "s/^X//" >'s/crontab' <<'END_OF_FILE' X X# S:CRONTAB X# X#min hr day mon dow command X X# adjust time every 24 hours.. keep us in line X#0 0 * * * dhb:altc/mousetime X X# Disable modem speaker while I'm asleep X X0 23 * * * getty -m0 X0 11 * * * getty -m1 X X# run UUCP nightly to various sites. X# X#0 3 * * * uucp:c/uucico -scae780 X#0 6 * * * uucp:c/uucico -ssorinc X X# trim log files at 8a.m. so they do not get too big. X0 8 * * * uucp:c/trimfile uuspool:logfile getty:logfile tmp:dcron.log -100 X X END_OF_FILE if test 471 -ne `wc -c <'s/crontab'`; then echo shar: \"'s/crontab'\" unpacked with wrong size! fi # end of 's/crontab' fi if test -f 's/startup-sequence' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'s/startup-sequence'\" else echo shar: Extracting \"'s/startup-sequence'\" $872 characters$ sed "s/^X//" >'s/startup-sequence' <<'END_OF_FILE' X X; Standalone Startup Sequence for UUCP X; X; no-frills startup-sequence. X Xsystem/Assign c: system Xsystem/path reset c Xresident c:Assign Xresident c:Wait X X; Need 8192 for all UUCP programs Xstack 8192 XAddbuffers df0: 10 X XAssign UUCP: : XAssign t: ram: X X; NORMALLY YOU DO NOT ASSIGN SPOOL, MAIL, AND NEWS TO VOLTILE STORAGE! X; THIS IS A SAMPLE STARTUP X; X; TMP: is used by DCron X XAssign TMP: ram: XAssign ENV: ram: XAssign UUSPOOL: ram: XAssign UULIB: UUCP:Lib XAssign UUMAIL: ram: XAssign UUNEWS: ram: X; UUPUB*: normally not temporary storage either. XAssign UUPUB: ram: XAssign UUPUBW: UUCP:Pub XAssign Getty: UUCP:Lib X X; Note, contains only dmail.help on the first distribution floppy X; required for online help XAssign Man: UUCP:man X Xmount null: Xmount uuser: X Xrun <nil: >nil: Getty -B1200 -Mh -7 Xwait 4 Xrun <nil: >nil: dcron T:dcron.log X END_OF_FILE if test 872 -ne `wc -c <'s/startup-sequence'`; then echo shar: \"'s/startup-sequence'\" unpacked with wrong size! fi # end of 's/startup-sequence' fi if test ! -d 'src' ; then echo shar: Creating directory \"'src'\" mkdir 'src' fi if test -f 'src/.Distfiles' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/.Distfiles'\" else echo shar: Extracting \"'src/.Distfiles'\" $9 characters$ sed "s/^X//" >'src/.Distfiles' <<'END_OF_FILE' Xsrc:dbbs END_OF_FILE if test 9 -ne `wc -c <'src/.Distfiles'`; then echo shar: \"'src/.Distfiles'\" unpacked with wrong size! fi # end of 'src/.Distfiles' fi if test ! -d 'src/GUtil' ; then echo shar: Creating directory \"'src/GUtil'\" mkdir 'src/GUtil' fi if test -f 'src/GUtil/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/GUtil/DMakefile'\" else echo shar: Extracting \"'src/GUtil/DMakefile'\" $676 characters$ sed "s/^X//" >'src/GUtil/DMakefile' <<'END_OF_FILE' X X# DMakefile X# X# (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X# X XOD= ltmp:uucp/ XSYMS= uucp:src/lib/all.m XSRCS= uuserdump.c uident.c gnote.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XCFLAGS= -iuucp:src/include/ -cq -v XEXE= uucp:c/ XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X Xall: $(EXE)uuserdump $(EXE)uident $(EXE)gnote X X$(EXE)uuserdump: $(OD)uuserdump.o X blink from lib:cres.o %(right) TO %(left) lib $(LIBS) X X$(EXE)uident: $(OD)uident.o X blink from lib:cres.o %(right) TO %(left) lib $(LIBS) X X$(EXE)gnote: $(OD)gnote.o X blink from lib:cres.o %(right) TO %(left) lib $(LIBS) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 676 -ne `wc -c <'src/GUtil/DMakefile'`; then echo shar: \"'src/GUtil/DMakefile'\" unpacked with wrong size! fi # end of 'src/GUtil/DMakefile' fi if test -f 'src/GUtil/uident.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/GUtil/uident.c'\" else echo shar: Extracting \"'src/GUtil/uident.c'\" $925 characters$ sed "s/^X//" >'src/GUtil/uident.c' <<'END_OF_FILE' X X/* X * UIDENT.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * UIDENT files... X * X * Searches for @($) <string> \0 and prints out X */ X X#include <stdio.h> X#include <fcntl.h> X#include "/version.h" X XIDENT(".01"); X Xvoid FindIdent(); X Xchar Buf[8192]; X Xvoid Xmain(ac, av) Xchar **av; X{ X short i; X int fd; X X for (i = 1; i < ac; ++i) { X printf("%-15s ", av[i]); X fd = open(av[i], O_RDONLY); X if (fd > 0) X FindIdent(fd); X else X printf("(unable to open)"); X puts(""); X fflush(stdout); X if (fd > 0) X close(fd); X } X} X Xvoid XFindIdent(fd) Xint fd; X{ X long n; X long i; X long x = 0; X X while ((n = read(fd, Buf + x, sizeof(Buf) - x)) > 0) { X n += x; X for (i = n - 128; i >= 0; --i) { X if (Buf[i] == '@' && Buf[i+1] == '(' && Buf[i+2] == '$' && Buf[i+3] == ')') { X printf("%s", Buf + i); X } X } X x = 128; X if (n < x) X x = n; X movmem(Buf + n - x, Buf, x); X } X} X END_OF_FILE if test 925 -ne `wc -c <'src/GUtil/uident.c'`; then echo shar: \"'src/GUtil/uident.c'\" unpacked with wrong size! fi # end of 'src/GUtil/uident.c' fi if test ! -d 'src/MUtil' ; then echo shar: Creating directory \"'src/MUtil'\" mkdir 'src/MUtil' fi if test -f 'src/MUtil/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/MUtil/DMakefile'\" else echo shar: Extracting \"'src/MUtil/DMakefile'\" $579 characters$ sed "s/^X//" >'src/MUtil/DMakefile' <<'END_OF_FILE' X XOD=ltmp:uucp/ XSRCS= from.c man.c expandm.c trimfile.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XSYMS= uucp:src/lib/all.m XCFLAGS= -iuucp:src/include/ -cq -v XEXE= uucp:c/ XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X XBLINK= blink from lib:cres.o %(right) TO %(left) SC SD LIB $(LIBS) X Xall: $(EXE)expand $(EXE)from $(EXE)man $(EXE)expandm $(EXE)trimfile X X$(EXE)trimfile: $(OD)trimfile.o X $(BLINK) X X$(EXE)expandm: $(OD)expandm.o X $(BLINK) X X$(EXE)from: $(OD)from.o X $(BLINK) X X$(EXE)man: $(OD)man.o X $(BLINK) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 579 -ne `wc -c <'src/MUtil/DMakefile'`; then echo shar: \"'src/MUtil/DMakefile'\" unpacked with wrong size! fi # end of 'src/MUtil/DMakefile' fi if test -f 'src/MUtil/expandm.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/MUtil/expandm.c'\" else echo shar: Extracting \"'src/MUtil/expandm.c'\" $432 characters$ sed "s/^X//" >'src/MUtil/expandm.c' <<'END_OF_FILE' X X/* X * EXPANDM.C expands alias via uulib:Aliases and prints X * results X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * EXPANDM alias X */ X Xmain(ac, av) Xchar *av[]; X{ X short i; X void callBack(); X X LoadAliases(); X for (i = 1; i < ac; ++i) { X printf("%s:", av[i]); X UserAliasList(av[i], callBack); X } X puts(""); X} X Xvoid XcallBack(name) Xchar *name; X{ X printf(" %s", name); X} X END_OF_FILE if test 432 -ne `wc -c <'src/MUtil/expandm.c'`; then echo shar: \"'src/MUtil/expandm.c'\" unpacked with wrong size! fi # end of 'src/MUtil/expandm.c' fi if test ! -d 'src/News060' ; then echo shar: Creating directory \"'src/News060'\" mkdir 'src/News060' fi if test ! -d 'src/News060/Anews' ; then echo shar: Creating directory \"'src/News060/Anews'\" mkdir 'src/News060/Anews' fi if test -f 'src/News060/Anews/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/News060/Anews/DMakefile'\" else echo shar: Extracting \"'src/News060/Anews/DMakefile'\" $477 characters$ sed "s/^X//" >'src/News060/Anews/DMakefile' <<'END_OF_FILE' X X# DMakefile for news X# (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X# X XOD=ltmp:uucp/anews/ XSRCS= anews.c mscan.c raw.c sendpacket.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XSYMS= uucp:src/lib/all.m XCFLAGS= -iuucp:src/include/ -cq -v -b0 XEXE= uucp:c/anews XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X Xall: $(EXE) X X$(EXE) : $(OBJS) X blink from lib:c.o %(right) to %(left) lib $(LIBS) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X X X END_OF_FILE if test 477 -ne `wc -c <'src/News060/Anews/DMakefile'`; then echo shar: \"'src/News060/Anews/DMakefile'\" unpacked with wrong size! fi # end of 'src/News060/Anews/DMakefile' fi if test -f 'src/News060/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/News060/DMakefile'\" else echo shar: Extracting \"'src/News060/DMakefile'\" $567 characters$ sed "s/^X//" >'src/News060/DMakefile' <<'END_OF_FILE' X X# DMakefile for news X# X# (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X# X XOD=ltmp:uucp/ XSRCS= rnews.c PostNews.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XSYMS= uucp:src/lib/all.m XCFLAGS= -iuucp:src/include/ -cq -v -b0 XEXE= uucp:c/ XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X Xall: $(EXE)rnews $(EXE)PostNews X X$(EXE)rnews: $(OD)rnews.o X blink from lib:c.o %(right) to %(left) lib $(LIBS) X X$(EXE)PostNews: $(OD)PostNews.o X blink from lib:c.o %(right) to %(left) lib $(LIBS) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 567 -ne `wc -c <'src/News060/DMakefile'`; then echo shar: \"'src/News060/DMakefile'\" unpacked with wrong size! fi # end of 'src/News060/DMakefile' fi if test -f 'src/ReadMe' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/ReadMe'\" else echo shar: Extracting \"'src/ReadMe'\" $811 characters$ sed "s/^X//" >'src/ReadMe' <<'END_OF_FILE' X X To compile: X X * You must have Lattice C 5.02 or greater (you might have to get rid X of the -cq option if you have <5.03.99) X X * Should compile under the new Manx C by fixing up the DMakefiles X but I haven't had time to try yet. X X * The dmake executable is required (should be in UUCP:C) X X * Object directories: (I normally put these on a different X partition on my HD). Holds .O files and symbol table. X X Assign LTMP: <some-place-to-hold-objs> X X MakeDir LTMP:uucp X MakeDir LTMP:uucp/lib X MakeDir LTMP:uucp/anews X MakeDir LTMP:dmail X X * Make the link library and symbol table X X 1> cd lib X 1> dmake X X * Make the remaining executables by CDing into the appropriate X source directory and typing 'dmake'. Executables will be X placed in uucp:c X END_OF_FILE if test 811 -ne `wc -c <'src/ReadMe'`; then echo shar: \"'src/ReadMe'\" unpacked with wrong size! fi # end of 'src/ReadMe' fi if test -f 'src/TODO' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/TODO'\" else echo shar: Extracting \"'src/TODO'\" $559 characters$ sed "s/^X//" >'src/TODO' <<'END_OF_FILE' X X sendmail: sort the To: list and remove duplicates due to aliases X sendmail: return erronous email to sender... Mailer-Daemon X sendmail: too-many-hops X sendmail: mail for this node... i.e. user says 'name@thisnode' X instead of just 'name'.. currently generates X. X files but sendmail does not (should not!) run uuxqt! X X aliases: rnews via alias mail based news X aliases: postnews via alias mail based news X X aliases: it is possible to get into a stack loop when X using the <file feature in the Aliases file. X END_OF_FILE if test 559 -ne `wc -c <'src/TODO'`; then echo shar: \"'src/TODO'\" unpacked with wrong size! fi # end of 'src/TODO' fi if test ! -d 'src/compress' ; then echo shar: Creating directory \"'src/compress'\" mkdir 'src/compress' fi if test -f 'src/compress/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/compress/DMakefile'\" else echo shar: Extracting \"'src/compress/DMakefile'\" $938 characters$ sed "s/^X//" >'src/compress/DMakefile' <<'END_OF_FILE' X XOD=ltmp:uucp/ XSRCS= compress.c tarsplit.c unshar.c uudecode.c uuencode.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XSYMS= uucp:src/lib/all.m XCFLAGS= -iuucp:src/include/ -cq -v XCFLAGS_LD= $(CFLAGS) -b0 XEXE= uucp:c/ XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X XBLINK= blink from lib:cres.o %(right) TO %(left) SC SD LIB $(LIBS) XBLINK_LD= blink from lib:c.o %(right) TO %(left) SC LIB $(LIBS) X Xall: $(EXE)compress $(EXE)tarsplit $(EXE)unshar \ X $(EXE)uudecode $(EXE)uuencode X X$(EXE)compress : $(OD)14compress.o X $(BLINK_LD) X X$(EXE)tarsplit : $(OD)tarsplit.o X $(BLINK) X X$(EXE)unshar : $(OD)unshar.o X $(BLINK) X X$(EXE)uudecode : $(OD)uudecode.o X $(BLINK) X X$(EXE)uuencode : $(OD)uuencode.o X $(BLINK) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X X$(OD)14compress.o : compress.c X lc $(CFLAGS_LD) -H$(SYMS) -o%(left) %(right) X X$(OD)16compress.o : compress.c X lc $(CFLAGS_LD) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 938 -ne `wc -c <'src/compress/DMakefile'`; then echo shar: \"'src/compress/DMakefile'\" unpacked with wrong size! fi # end of 'src/compress/DMakefile' fi if test ! -d 'src/dmail' ; then echo shar: Creating directory \"'src/dmail'\" mkdir 'src/dmail' fi if test -f 'src/dmail/TODO' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/dmail/TODO'\" else echo shar: Extracting \"'src/dmail/TODO'\" $329 characters$ sed "s/^X//" >'src/dmail/TODO' <<'END_OF_FILE' X XLIST tabs.... Xother junk, fix bugs (malloc stuff) X X-multiple dimension arrayed variables, add ability to do a natural join X coupled to a command. X X-Automatically remove fields on forward, mail, and reply. X XResend support: X New To: on top. X New Cc: .... etc etc etc X prepend Resent- to Date, From, Message-Id, *To, *Cc X X END_OF_FILE if test 329 -ne `wc -c <'src/dmail/TODO'`; then echo shar: \"'src/dmail/TODO'\" unpacked with wrong size! fi # end of 'src/dmail/TODO' fi if test -f 'src/dmail/dmkhelp.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/dmail/dmkhelp.c'\" else echo shar: Extracting \"'src/dmail/dmkhelp.c'\" $958 characters$ sed "s/^X//" >'src/dmail/dmkhelp.c' <<'END_OF_FILE' X X/* X * DMKHELP.C X * X * (C) Copyright 1985-1990 by Matthew Dillon, All Rights Reserved. X * X * Standalone C source. X * X * Takes the file DMAIL.HELP (or that specified), and puts quotes and X * commas around each line, the output to stdout. Used by Makefile to X * place the help file on line (by making it a static array). See the X * Makefile. X * X */ X X#include <stdio.h> X X#define HELPC "dmail.help" X Xstatic char buf[1024]; X Xmain(argc, argv) Xchar *argv[]; X{ X FILE *fi; X char *ptr; X int len; X register int i; X X if (argc == 1) X fi = fopen (HELPC, "r"); X else X fi = fopen (argv[1], "r"); X if (fi == NULL) { X puts ("CANNOT OPEN"); X exit (1); X } X while (fgets (buf, 1024, fi)) { X len = strlen(buf) - 1; X buf[len] = '\0'; X putchar ('\"'); X for (i = 0; i < len; ++i) { X if (buf[i] == '\"') { X putchar ('\\'); X putchar ('\"'); X } else { X putchar (buf[i]); X } X } X puts ("\","); X } X puts ("NULL"); X fclose (fi); X} X X END_OF_FILE if test 958 -ne `wc -c <'src/dmail/dmkhelp.c'`; then echo shar: \"'src/dmail/dmkhelp.c'\" unpacked with wrong size! fi # end of 'src/dmail/dmkhelp.c' fi if test -f 'src/dmail/execom.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/dmail/execom.h'\" else echo shar: Extracting \"'src/dmail/execom.h'\" $358 characters$ sed "s/^X//" >'src/dmail/execom.h' <<'END_OF_FILE' X X/* X * EXECOM.H X * X * (C) Copyright 1985-1990 by Matthew Dillon, All Rights Reserved. X */ X Xstruct COMMAND { X int (*func)(); X int stat; X int val; X char *name; X}; X Xextern struct COMMAND Command[]; Xextern char *Desc[]; X X#define C_NO 0x01 /* Not implimented yet */ X#define C_COND 0x02 /* Is conditional, execute despite if */ X X END_OF_FILE if test 358 -ne `wc -c <'src/dmail/execom.h'`; then echo shar: \"'src/dmail/execom.h'\" unpacked with wrong size! fi # end of 'src/dmail/execom.h' fi if test ! -d 'src/getty' ; then echo shar: Creating directory \"'src/getty'\" mkdir 'src/getty' fi if test -f 'src/getty/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/getty/DMakefile'\" else echo shar: Extracting \"'src/getty/DMakefile'\" $369 characters$ sed "s/^X//" >'src/getty/DMakefile' <<'END_OF_FILE' X XOD= ltmp:uucp/ XSYMS= uucp:src/lib/all.m XSRCS= getty.c passwd.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XCFLAGS= -iuucp:src/include/ -cim -cq XEXE= uucp:c/ XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X Xall: $(EXE)getty X X$(EXE)getty: $(OBJS) X blink from lib:cres.o $(OBJS) SC SD TO %(left) lib $(LIBS) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 369 -ne `wc -c <'src/getty/DMakefile'`; then echo shar: \"'src/getty/DMakefile'\" unpacked with wrong size! fi # end of 'src/getty/DMakefile' fi if test -f 'src/getty/syms.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/getty/syms.c'\" else echo shar: Extracting \"'src/getty/syms.c'\" $195 characters$ sed "s/^X//" >'src/getty/syms.c' <<'END_OF_FILE' X X/* X * SYMS.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * almost-dummy file for precomp symbol table gen. X */ X X#include <exec/types.h> X#include <proto/all.h> X END_OF_FILE if test 195 -ne `wc -c <'src/getty/syms.c'`; then echo shar: \"'src/getty/syms.c'\" unpacked with wrong size! fi # end of 'src/getty/syms.c' fi if test ! -d 'src/include' ; then echo shar: Creating directory \"'src/include'\" mkdir 'src/include' fi if test -f 'src/include/log.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/log.h'\" else echo shar: Extracting \"'src/include/log.h'\" $330 characters$ sed "s/^X//" >'src/include/log.h' <<'END_OF_FILE' X X/* X * LOG.H X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X */ X Xextern int LogToStdout; Xextern int LogLevel; Xextern char *LogProgram; Xextern char *LogHost; Xextern char *LogWho; Xextern char *LogFile; X X#define DEBUG(level, msg, moremsg) if (LogLevel > level) printf(msg, moremsg) X END_OF_FILE if test 330 -ne `wc -c <'src/include/log.h'`; then echo shar: \"'src/include/log.h'\" unpacked with wrong size! fi # end of 'src/include/log.h' fi if test -f 'src/include/pwd.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/pwd.h'\" else echo shar: Extracting \"'src/include/pwd.h'\" $540 characters$ sed "s/^X//" >'src/include/pwd.h' <<'END_OF_FILE' X X/* X * PWD.H X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X */ X Xstruct passwd { X char *pw_name; X char *pw_passwd; X long pw_uid; X long pw_gid; X long pw_quota; X char *pw_comment; X char *pw_gecos; X char *pw_dir; X char *pw_shell; X char *pw_shell_arg0; /* arg0 broken out from pw_shell */ X char *pw_shell_argn; /* remaining args from pw_shell */ X}; X Xextern struct passwd *getpwuid(); Xextern struct passwd *getpwnam(); X Xextern char *PasswdFile; X END_OF_FILE if test 540 -ne `wc -c <'src/include/pwd.h'`; then echo shar: \"'src/include/pwd.h'\" unpacked with wrong size! fi # end of 'src/include/pwd.h' fi if test ! -d 'src/include/sys' ; then echo shar: Creating directory \"'src/include/sys'\" mkdir 'src/include/sys' fi if test -f 'src/include/sys/file.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/sys/file.h'\" else echo shar: Extracting \"'src/include/sys/file.h'\" $136 characters$ sed "s/^X//" >'src/include/sys/file.h' <<'END_OF_FILE' X X/* X * FILE.H X * X * UNIX compat. X */ X X#include <fcntl.h> X X#define LOCK_EX 0x01 X#define LOCK_UN 0x02 X#define LOCK_NB 0x04 X END_OF_FILE if test 136 -ne `wc -c <'src/include/sys/file.h'`; then echo shar: \"'src/include/sys/file.h'\" unpacked with wrong size! fi # end of 'src/include/sys/file.h' fi if test -f 'src/include/sys/stat.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/sys/stat.h'\" else echo shar: Extracting \"'src/include/sys/stat.h'\" $239 characters$ sed "s/^X//" >'src/include/sys/stat.h' <<'END_OF_FILE' X X/* X * STAT.H X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * Expand as applicable for library routines in uucp:src/lib X */ X Xstruct stat { X long st_ino; X long st_mtime; X long st_ctime; X}; X END_OF_FILE if test 239 -ne `wc -c <'src/include/sys/stat.h'`; then echo shar: \"'src/include/sys/stat.h'\" unpacked with wrong size! fi # end of 'src/include/sys/stat.h' fi if test -f 'src/include/sys/time.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/sys/time.h'\" else echo shar: Extracting \"'src/include/sys/time.h'\" $107 characters$ sed "s/^X//" >'src/include/sys/time.h' <<'END_OF_FILE' X X/* X * SYS/TIME.H X * X * UNIX Compat X */ X X#ifndef SYS_TIME_H X#define SYS_TIME_H X#include <time.h> X#endif X END_OF_FILE if test 107 -ne `wc -c <'src/include/sys/time.h'`; then echo shar: \"'src/include/sys/time.h'\" unpacked with wrong size! fi # end of 'src/include/sys/time.h' fi if test -f 'src/include/sys/types.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/sys/types.h'\" else echo shar: Extracting \"'src/include/sys/types.h'\" $125 characters$ sed "s/^X//" >'src/include/sys/types.h' <<'END_OF_FILE' X X/* X * SYS/TYPES.H X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * UNIX compatibility? X */ X X END_OF_FILE if test 125 -ne `wc -c <'src/include/sys/types.h'`; then echo shar: \"'src/include/sys/types.h'\" unpacked with wrong size! fi # end of 'src/include/sys/types.h' fi if test -f 'src/include/tmpfile.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/include/tmpfile.h'\" else echo shar: Extracting \"'src/include/tmpfile.h'\" $126 characters$ sed "s/^X//" >'src/include/tmpfile.h' <<'END_OF_FILE' X X/* X * TMPFILE.H X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X */ X Xchar *TmpFileName(char *); X END_OF_FILE if test 126 -ne `wc -c <'src/include/tmpfile.h'`; then echo shar: \"'src/include/tmpfile.h'\" unpacked with wrong size! fi # end of 'src/include/tmpfile.h' fi if test ! -d 'src/lib' ; then echo shar: Creating directory \"'src/lib'\" mkdir 'src/lib' fi if test -f 'src/lib/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/DMakefile'\" else echo shar: Extracting \"'src/lib/DMakefile'\" $615 characters$ sed "s/^X//" >'src/lib/DMakefile' <<'END_OF_FILE' X X# DMakefile For Lattice V5.02 X# X XOD = ltmp:uucp/lib/ XEXE = uucp.lib XSYMS = all.m X XSRCS = getpwnam.c serialport.c setstdin.c sleep.c validuser.c lsys.c \ X mntreq.c security.c log.c lockfile.c tmpfile.c seq.c getenv.c \ X config.c alias.c string.c X XOBJS = $(SRCS:"*.c":"$(OD)*.o") X XCFLAGS= -iuucp:src/include/ -cq X X$(EXE) : $(SYMS) $(OBJS) X list LFORMAT $(OD)%s TO $(OD)list.lst $(OD)#?.o X oml %(left) r @$(OD)list.lst X filenote %(left) NODIST X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X X$(SYMS) : syms.c X lc $(CFLAGS) -ph -o$(SYMS) syms.c X filenote %(left) NODIST X END_OF_FILE if test 615 -ne `wc -c <'src/lib/DMakefile'`; then echo shar: \"'src/lib/DMakefile'\" unpacked with wrong size! fi # end of 'src/lib/DMakefile' fi if test -f 'src/lib/getenv.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/getenv.c'\" else echo shar: Extracting \"'src/lib/getenv.c'\" $834 characters$ sed "s/^X//" >'src/lib/getenv.c' <<'END_OF_FILE' X X/* X * GETENV.C X * X * Lattice's screws up. X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X */ X X#include <proto/all.h> X#include <stdio.h> X#include <stdlib.h> X Xchar * Xgettmpenv(id) Xchar *id; X{ X static char *buf; X static char *res = NULL; X long fh; X long len; X X buf = malloc(strlen(id) + 8); X sprintf(buf, "ENV:%s", id); X fh = Open(buf, 1005); X free(buf); X if (fh) { X Seek(fh, 0L, 1); X len = Seek(fh, 0L, -1); X if (len < 0) { X Close(fh); X return(NULL); X } X if (res) X free(res); X res = malloc(len + 1); X Read(fh, res, len); X Close(fh); X res[len] = 0; X return(res); X } X return(NULL); X} X Xchar * Xgetenv(id) Xchar *id; X{ X char *res = gettmpenv(id); X char *perm = NULL; X X if (res) { X perm = malloc(strlen(res) + 1); X strcpy(perm, res); X } X return(perm); X} X END_OF_FILE if test 834 -ne `wc -c <'src/lib/getenv.c'`; then echo shar: \"'src/lib/getenv.c'\" unpacked with wrong size! fi # end of 'src/lib/getenv.c' fi if test -f 'src/lib/lsys.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/lsys.c'\" else echo shar: Extracting \"'src/lib/lsys.c'\" $621 characters$ sed "s/^X//" >'src/lib/lsys.c' <<'END_OF_FILE' X X/* X * LSYS.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X */ X X#include <stdio.h> X Xint Xis_in_L_sys_file(system_name) Xchar *system_name; X{ X static char buf[256]; X static char system[128]; X FILE *fd; X X if (!(fd = fopen("UULIB:L.sys","r"))) { X printf("Couldn't open UULIB:L.sys file\n"); X exit(1); X } X X sprintf(system,"%s ", system_name); X X while (NULL != fgets(buf, sizeof buf, fd)) { X if (buf[0] == '#' || buf[0] == '\n') X continue; X if (strncmp(buf, system, strlen(system)) == 0) { X fclose(fd); X return TRUE; X } X } X fclose(fd); X return FALSE; X} X X END_OF_FILE if test 621 -ne `wc -c <'src/lib/lsys.c'`; then echo shar: \"'src/lib/lsys.c'\" unpacked with wrong size! fi # end of 'src/lib/lsys.c' fi if test -f 'src/lib/mntreq.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/mntreq.c'\" else echo shar: Extracting \"'src/lib/mntreq.c'\" $519 characters$ sed "s/^X//" >'src/lib/mntreq.c' <<'END_OF_FILE' X X/* X * MNTREQ.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X */ X X#include <proto/all.h> X Xtypedef struct Process PROC; X Xvoid Xmountrequest(bool) Xint bool; X{ X static APTR original_pr_WindowPtr = NULL; X register PROC *proc; X X proc = (PROC *)FindTask(0); X if (!bool && proc->pr_WindowPtr != (APTR)-1) { X original_pr_WindowPtr = proc->pr_WindowPtr; X proc->pr_WindowPtr = (APTR)-1; X } X if (bool && proc->pr_WindowPtr == (APTR)-1) X proc->pr_WindowPtr = original_pr_WindowPtr; X} X X END_OF_FILE if test 519 -ne `wc -c <'src/lib/mntreq.c'`; then echo shar: \"'src/lib/mntreq.c'\" unpacked with wrong size! fi # end of 'src/lib/mntreq.c' fi if test -f 'src/lib/seq.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/seq.c'\" else echo shar: Extracting \"'src/lib/seq.c'\" $643 characters$ sed "s/^X//" >'src/lib/seq.c' <<'END_OF_FILE' X X/* X * SEQ.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * Returns a unique sequence number X */ X X#include <stdio.h> X XGetSequence(bump) X{ X char *seqfile = "UULIB:seq"; X FILE *fp; X int seq; X char buf[32]; X X LockFile(seqfile); X fp = fopen("UULIB:seq","r"); X if (fp) { X fgets(buf, 32, fp); X seq = atoi(buf); X fclose(fp); X } else { X perror("UULIB:seq"); X seq = -1; X } X X if (seq > 0) { X fp = fopen("UULIB:seq", "w"); X if (fp) { X fprintf(fp,"%d", seq + bump); X fclose(fp); X } else { X perror("UULIB:seq"); X seq = -1; X } X } X UnLockFile(seqfile); X return(seq); X} X END_OF_FILE if test 643 -ne `wc -c <'src/lib/seq.c'`; then echo shar: \"'src/lib/seq.c'\" unpacked with wrong size! fi # end of 'src/lib/seq.c' fi if test -f 'src/lib/setstdin.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/setstdin.c'\" else echo shar: Extracting \"'src/lib/setstdin.c'\" $815 characters$ sed "s/^X//" >'src/lib/setstdin.c' <<'END_OF_FILE' X X/* X * SETSTDIN.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * Sets stdin, stdout, and stderr to UUSER: handler X */ X X#include <stdio.h> X XSetStdin(ac, av) Xchar *av[]; X{ X short i; X short getty = 0; /* from getty */ X char *device = "serial.device"; /* device name */ X long unit = 0; /* unit no. */ X char buf[64]; X FILE *f1, *f2, *f3; X X for (i = 1; i < ac; ++i) { X char *ptr = av[i]; X if (*ptr != '-') X continue; X if (ptr[1] == 'D') X device = av[++i]; X if (ptr[1] == 'U') X unit = atoi(av[++i]); X if (ptr[1] == 'G') X getty = 1; X } X sprintf(buf, "UUSER:%s/%d/R1000G%d", device, unit, getty); X f1 = freopen(buf, "r", stdin); X f2 = freopen(buf, "w+", stdout); X f3 = freopen(buf, "w+", stderr); X return(f1 && f2 && f3); X} X END_OF_FILE if test 815 -ne `wc -c <'src/lib/setstdin.c'`; then echo shar: \"'src/lib/setstdin.c'\" unpacked with wrong size! fi # end of 'src/lib/setstdin.c' fi if test -f 'src/lib/sleep.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/sleep.c'\" else echo shar: Extracting \"'src/lib/sleep.c'\" $156 characters$ sed "s/^X//" >'src/lib/sleep.c' <<'END_OF_FILE' X X/* X * SLEEP.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X */ X X#include <proto/all.h> X Xvoid Xsleep(n) X{ X Delay(50*n); X} X END_OF_FILE if test 156 -ne `wc -c <'src/lib/sleep.c'`; then echo shar: \"'src/lib/sleep.c'\" unpacked with wrong size! fi # end of 'src/lib/sleep.c' fi if test -f 'src/lib/string.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/string.c'\" else echo shar: Extracting \"'src/lib/string.c'\" $589 characters$ sed "s/^X//" >'src/lib/string.c' <<'END_OF_FILE' X X/* X * STRING.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X */ X Xstrcmpi(s, d) Xchar *s; Xchar *d; X{ X short c1, c2; X for (;;) { X c1 = *s++; X c2 = *d++; X X if (c1 == 0 || c2 == 0) X return(c1 || c2); /* 0= both are 0 */ X if (((c1 ^ c2) | 0x20) != 0x20) X return(1); X } X return(0); X} X Xstrncmpi(s, d, n) Xchar *s; Xchar *d; Xshort n; X{ X short c1, c2; X while (n--) { X c1 = *s++; X c2 = *d++; X X if (c1 == 0 || c2 == 0) X return(c1 || c2); /* 0= both are 0 */ X if (((c1 ^ c2) | 0x20) != 0x20) X return(1); X } X return(0); X} X END_OF_FILE if test 589 -ne `wc -c <'src/lib/string.c'`; then echo shar: \"'src/lib/string.c'\" unpacked with wrong size! fi # end of 'src/lib/string.c' fi if test -f 'src/lib/syms.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/syms.c'\" else echo shar: Extracting \"'src/lib/syms.c'\" $49 characters$ sed "s/^X//" >'src/lib/syms.c' <<'END_OF_FILE' X X#include <exec/types.h> X#include <proto/all.h> X END_OF_FILE if test 49 -ne `wc -c <'src/lib/syms.c'`; then echo shar: \"'src/lib/syms.c'\" unpacked with wrong size! fi # end of 'src/lib/syms.c' fi if test -f 'src/lib/tmpfile.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/tmpfile.c'\" else echo shar: Extracting \"'src/lib/tmpfile.c'\" $376 characters$ sed "s/^X//" >'src/lib/tmpfile.c' <<'END_OF_FILE' X X/* X * TMPFILE.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X * X * create a temporary file X * X * template limited to 16 chars X */ X Xchar * XTmpFileName(template) Xchar *template; X{ X static char Template[256]; X static unsigned short Idx; X X sprintf(Template, "%s-%08lx.TMP", template, (long)FindTask(NULL) + Idx++); X return(Template); X} X END_OF_FILE if test 376 -ne `wc -c <'src/lib/tmpfile.c'`; then echo shar: \"'src/lib/tmpfile.c'\" unpacked with wrong size! fi # end of 'src/lib/tmpfile.c' fi if test -f 'src/lib/validuser.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/lib/validuser.c'\" else echo shar: Extracting \"'src/lib/validuser.c'\" $338 characters$ sed "s/^X//" >'src/lib/validuser.c' <<'END_OF_FILE' X X/* X * VALIDUSER.C X * X * (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X */ X XValidUser(str) Xchar *str; X{ X if (*str == '|' || *str == '@') X return(0); X while (*str) { X if (*str < 32 || *str > 126) X return(0); X if (*str == ':') X return(0); X if (*str == '/') X return(0); X ++str; X } X return(1); X} X END_OF_FILE if test 338 -ne `wc -c <'src/lib/validuser.c'`; then echo shar: \"'src/lib/validuser.c'\" unpacked with wrong size! fi # end of 'src/lib/validuser.c' fi if test ! -d 'src/sendmail' ; then echo shar: Creating directory \"'src/sendmail'\" mkdir 'src/sendmail' fi if test -f 'src/sendmail/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/sendmail/DMakefile'\" else echo shar: Extracting \"'src/sendmail/DMakefile'\" $496 characters$ sed "s/^X//" >'src/sendmail/DMakefile' <<'END_OF_FILE' X X# X# (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X# X XOD= ltmp:uucp/ XSYMS= uucp:src/lib/all.m XSRCS= sendmail.c parse.c domain.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XCFLAGS= -iuucp:src/include/ -cim -cq XEXE= uucp:c/ XLIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib X Xall: $(EXE)sendmail X X$(EXE)sendmail: $(OBJS) X blink from lib:cres.o $(OBJS) SC SD TO %(left) lib $(LIBS) X copy $(EXE)sendmail $(EXE)rmail X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 496 -ne `wc -c <'src/sendmail/DMakefile'`; then echo shar: \"'src/sendmail/DMakefile'\" unpacked with wrong size! fi # end of 'src/sendmail/DMakefile' fi if test ! -d 'src/uucico' ; then echo shar: Creating directory \"'src/uucico'\" mkdir 'src/uucico' fi if test -f 'src/uucico/modem.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/uucico/modem.h'\" else echo shar: Extracting \"'src/uucico/modem.h'\" $854 characters$ sed "s/^X//" >'src/uucico/modem.h' <<'END_OF_FILE' X/* modem.h X X This file defines all the routines that specific to the modem. X X Copyright 1988 by William Loftus. All rights reserved. X X*/ X X/* When in SLAVE mode the this routine should poll the modem for X a CONNECT message (at least on Hayes's) */ Xvoid openline(); X X/* Machines may dial in at different baud rates that are reported by the X modem. This routine uncovers what the baud rate incomming rate is X and returns it as an int */ Xint get_baud(); X X/* This routine is called when the UUCICO program starts up */ Xvoid modem_init(); X X/* this routine takes a number as a parameter and sends the appropriate X commands to the modem to dial that number */ Xint dial_nbr(char *); X X/* This routine is called at the end of a call. It should reset the modem X to the appropriate state (i.e. ready to receive another call) */ Xvoid reset_modem(); X END_OF_FILE if test 854 -ne `wc -c <'src/uucico/modem.h'`; then echo shar: \"'src/uucico/modem.h'\" unpacked with wrong size! fi # end of 'src/uucico/modem.h' fi if test -f 'src/uucico/uuhosts.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/uucico/uuhosts.c'\" else echo shar: Extracting \"'src/uucico/uuhosts.c'\" $672 characters$ sed "s/^X//" >'src/uucico/uuhosts.c' <<'END_OF_FILE' X/* X UUHOSTS -- List all UUCP sites connected to our system X X Usage: UUHOSTS X X Copyright 1988 by William Loftus. All rights reserved. X X ARPA: wpl@prc.unisys.com X UUCP: wpl@burdvax.UUCP X USMAIL: Unisys/Paoli Research Center;PO BOX 517;Paoli, PA 19301-0517 X X*/ X X#include "/version.h" X#include <stdio.h> X XIDENT(".01"); X Xvoid Xmain() X{ X char buf[256]; X FILE *fd; X X if (!(fd = fopen("UULIB:L.sys", "r"))) { X printf("Couldn't open UULIB:L.sys file\n"); X exit(1); X } X X while (fgets(buf, sizeof buf, fd)) { X if (buf[0] == '#' || buf[0] == '\n') X continue; X buf[(int)strchr(buf,' ') - (int)buf] = '\0'; X printf("%s\n", buf); X } X fclose(fd); X} X END_OF_FILE if test 672 -ne `wc -c <'src/uucico/uuhosts.c'`; then echo shar: \"'src/uucico/uuhosts.c'\" unpacked with wrong size! fi # end of 'src/uucico/uuhosts.c' fi if test -f 'src/uucico/uuname.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/uucico/uuname.c'\" else echo shar: Extracting \"'src/uucico/uuname.c'\" $675 characters$ sed "s/^X//" >'src/uucico/uuname.c' <<'END_OF_FILE' X X/* X UUHOSTS -- List all UUCP sites connected to our system X X Usage: UUHOSTS X X Copyright 1988 by William Loftus. All rights reserved. X X ARPA: wpl@prc.unisys.com X UUCP: wpl@burdvax.UUCP X USMAIL: Unisys/Paoli Research Center;PO BOX 517;Paoli, PA 19301-0517 X X*/ X X#include <stdio.h> X#include "/version.h" X XIDENT(".00"); X Xvoid Xmain() X{ X char buf[256]; X FILE *fd; X X if (!(fd = fopen("UULIB:L.sys", "r"))) { X printf("Couldn't open UULIB:L.sys file\n"); X exit(1); X } X X while (fgets(buf, sizeof buf, fd)) { X if (buf[0] == '#' || buf[0] == '\n') X continue; X buf[(int)strchr(buf,' ') - (int)buf] = '\0'; X printf("%s\n", buf); X } X X fclose(fd); X} X X END_OF_FILE if test 675 -ne `wc -c <'src/uucico/uuname.c'`; then echo shar: \"'src/uucico/uuname.c'\" unpacked with wrong size! fi # end of 'src/uucico/uuname.c' fi if test -f 'src/uucico/uupoll.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/uucico/uupoll.c'\" else echo shar: Extracting \"'src/uucico/uupoll.c'\" $939 characters$ sed "s/^X//" >'src/uucico/uupoll.c' <<'END_OF_FILE' X/* X UUPOLL -- call a UUCP connect site X X Usage: UUPOLL <system-name> X X Copyright 1988 by William Loftus. All rights reserved. X X ARPA: wpl@prc.unisys.com X UUCP: wpl@burdvax.UUCP X USMAIL: Unisys/Paoli Research Center;PO BOX 517;Paoli, PA 19301-0517 X X*/ X X#include <stdio.h> X#include "/version.h" X X#define LOCK_FILE "t:UUCP.LCK" X X#define TRUE 1 X#define FALSE 0 X XIDENT(".02"); X XCXBRK() X{ X return(0); X} X Xvoid Xmain (argc, argv) Xint argc; Xchar ** argv; X{ X static char buf[256]; X X if (argc != 2) { X printf("Usage: UUPOLL <system-name>\n"); X exit(1); X } X X if (access(LOCK_FILE,0) != -1) { X printf("UUCP is locked.\n"); X exit(0); X } X X if (is_in_L_sys_file(argv[1])) { X sprintf(buf, "run >nil: <nil: UUCICO -s%s\n", argv[1]); X if (system(buf) == -1) { X printf("Error spawning task to call system \"%s\"\n", argv[1]); X } X } else { X printf("System \"%s\" not in UULIB:L.sys file.\n", argv[1]); X } X} X X END_OF_FILE if test 939 -ne `wc -c <'src/uucico/uupoll.c'`; then echo shar: \"'src/uucico/uupoll.c'\" unpacked with wrong size! fi # end of 'src/uucico/uupoll.c' fi if test ! -d 'src/uuser' ; then echo shar: Creating directory \"'src/uuser'\" mkdir 'src/uuser' fi if test -f 'src/uuser/DMakefile' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/uuser/DMakefile'\" else echo shar: Extracting \"'src/uuser/DMakefile'\" $506 characters$ sed "s/^X//" >'src/uuser/DMakefile' <<'END_OF_FILE' X X# DMakefile for uuser: X# X# (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved. X XOD= ltmp:uucp/ XSYMS= uucp:src/lib/all.m XSRCS= uuser.c misc.c XOBJS= $(SRCS:"*.c":"$(OD)*.o") XCFLAGS= -iuucp:src/include/ -cimq -v XLEXE= uucp:l/ X#LIBS= uucp:src/lib/uucp.lib lib:lc.lib lib:amiga.lib XLIBS= lib:lc.lib lib:amiga.lib X Xall: $(LEXE)uuser-handler X X$(LEXE)uuser-handler : $(OBJS) X blink from $(OBJS) ADDSYM TO %(left) lib $(LIBS) X X$(OBJS) : $(SRCS) X lc $(CFLAGS) -H$(SYMS) -o%(left) %(right) X END_OF_FILE if test 506 -ne `wc -c <'src/uuser/DMakefile'`; then echo shar: \"'src/uuser/DMakefile'\" unpacked with wrong size! fi # end of 'src/uuser/DMakefile' fi if test -f 'src/uuser/mountlist' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/uuser/mountlist'\" else echo shar: Extracting \"'src/uuser/mountlist'\" $100 characters$ sed "s/^X//" >'src/uuser/mountlist' <<'END_OF_FILE' X XUUSER: Handler = uucp:l/uuser-handler X Stacksize = 6000 X Priority = 5 X GlobVec = 1 X# X END_OF_FILE if test 100 -ne `wc -c <'src/uuser/mountlist'`; then echo shar: \"'src/uuser/mountlist'\" unpacked with wrong size! fi # end of 'src/uuser/mountlist' fi if test -f 'src/version.h' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'src/version.h'\" else echo shar: Extracting \"'src/version.h'\" $705 characters$ sed "s/^X//" >'src/version.h' <<'END_OF_FILE' X X/* X * VERSION.H X * X * Major version number (minor version numbers kept in subsidary X * files. X */ X X#define VERSION "V1.03D(0.40W/0.60W)" X X#define COPYRIGHT \ X "(C) Copyright 1987 by John Gilmore\n" \ X "Copying and use of this program are controlled by the terms of the Free\n" \ X "Software Foundation's GNU Emacs General Public License.\n" \ X "Amiga Changes Copyright 1988 by William Loftus. All rights reserved.\n" \ X "Additional chgs Copyright 1989 by Matthew Dillon, All Rights Reserved.\n" X X#define DCOPYRIGHT \ X "(c)Copyright 1990, Matthew Dillon, all rights reserved\n" X X#define IDENT(subv) static char *Ident = "@($)" __FILE__ " " VERSION subv " " __DATE__ X END_OF_FILE if test 705 -ne `wc -c <'src/version.h'`; then echo shar: \"'src/version.h'\" unpacked with wrong size! fi # end of 'src/version.h' fi echo shar: End of archive 1 $of 16$. cp /dev/null ark1isdone MISSING="" for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ; do if test ! -f ark${I}isdone ; then MISSING="${MISSING} ${I}" fi done if test "${MISSING}" = "" ; then echo You have unpacked all 16 archives. rm -f ark[1-9]isdone ark[1-9][0-9]isdone else echo You still need to unpack the following archives: echo " " ${MISSING} fi ## End of shell archive. exit 0 -- Submissions to comp.sources.amiga and comp.binaries.amiga should be sent to: amiga@cs.odu.edu or amiga@xanth.cs.odu.edu ( obsolescent mailers may need this address ) or ...!uunet!xanth!amiga ( very obsolescent mailers need this address ) Comments, questions, and suggestions should be addressed to ``amiga-request'' (please only use ``amiga'' for actual submissions) at the above addresses.